unit U_fm_msgsair;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, cxGraphics, cxControls, cxLookAndFeels,
  cxLookAndFeelPainters, cxContainer, cxEdit, dxSkinsCore, dxSkinBlack,
  dxSkinBlue, dxSkinBlueprint, dxSkinCaramel, dxSkinCoffee, dxSkinDarkRoom,
  dxSkinDarkSide, dxSkinDevExpressDarkStyle, dxSkinDevExpressStyle, dxSkinFoggy,
  dxSkinGlassOceans, dxSkinHighContrast, dxSkiniMaginary, dxSkinLilian,
  dxSkinLiquidSky, dxSkinLondonLiquidSky, dxSkinMcSkin, dxSkinMoneyTwins,
  dxSkinOffice2007Black, dxSkinOffice2007Blue, dxSkinOffice2007Green,
  dxSkinOffice2007Pink, dxSkinOffice2007Silver, dxSkinOffice2010Black,
  dxSkinOffice2010Blue, dxSkinOffice2010Silver, dxSkinOffice2013White,
  dxSkinPumpkin, dxSkinSeven, dxSkinSevenClassic, dxSkinSharp, dxSkinSharpPlus,
  dxSkinSilver, dxSkinSpringTime, dxSkinStardust, dxSkinSummer2008,
  dxSkinTheAsphaltWorld, dxSkinsDefaultPainters, dxSkinValentine, dxSkinVS2010,
  dxSkinWhiteprint, dxSkinXmas2008Blue, Vcl.Menus, Vcl.StdCtrls, cxButtons,
  cxLabel, cxGroupBox, Vcl.ExtCtrls;

type
  Tfm_msgsair = class(TForm)
    pnlPnl00_Conteiner: TPanel;
    imgImg_BarraTop: TImage;
    pnlPnl02_LadoCentro: TPanel;
    GrpB_01Principal: TcxGroupBox;
    Lbl_MsgSair: TcxLabel;
    pnlPnl01_LadoTopo: TPanel;
    img1: TImage;
    Lbl_LogoMsg: TcxLabel;
    cxButton1: TcxButton;
    Btn_Ok: TcxButton;
    procedure cxButton1Click(Sender: TObject);
    procedure Btn_OkClick(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  fm_msgsair: Tfm_msgsair;

implementation

{$R *.dfm}

procedure Tfm_msgsair.Btn_OkClick(Sender: TObject);
begin
Close;
end;

procedure Tfm_msgsair.cxButton1Click(Sender: TObject);
begin

   Application.Terminate

end;

end.
